home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / maximus / stbar20.zip / GETDESC.CMD < prev    next >
OS/2 REXX Batch file  |  1996-04-11  |  3KB  |  96 lines
  1. @echo off
  2. rem ====--=StarBar V2.00=--===--=DIZ & SDN.ID Descriptor File Grabber=--====
  3. rem          OS/2 CMD
  4. rem
  5. rem ====--=Usage=--====
  6. rem
  7. rem first parameter : StarBar Work Path
  8. rem second parameter : Full path and Filename to be examined
  9. rem
  10. rem ========================================================================
  11. rem
  12. rem NOTE: This CMD file is simply a copy of the DOS BAT file! If you have
  13. rem       native OS/2 archivers, you will have to substitute their names
  14. rem       below.
  15. rem       Please let me know via NETMAIL how this works as it is untested!
  16.  
  17. rem     After each node has used StarBar at least once, the next line may be
  18. rem     removed...
  19.  
  20. md %1
  21.  
  22. cd %1
  23.  
  24. if exist %1\*.arj goto ARJ
  25. if exist %1\*.zip goto ZIP
  26. if exist %1\*.lzh goto LHA
  27. if exist %1\*.rar goto UNRAR
  28. if exist %1\*.arc goto PKUNPAK
  29. if exist %1\*.zoo goto ZOO
  30. if exist %1\*.pak goto PAK
  31.  
  32. rem    Add any other archivers you wish to support here, then follow the
  33. rem    examples below on extracting the info...
  34.  
  35. goto end
  36.  
  37. :ARJ
  38. arj e -y %2 file_id.diz
  39. if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
  40. if exist %1\descfile.txt goto end
  41. arj e -y %2 sdn.id
  42. if exist %1\sdn.id ren %1\sdn.id descfile.txt
  43. goto end
  44.  
  45. :ZIP
  46. pkunzip -o %2 file_id.diz
  47. if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
  48. if exist %1\descfile.txt goto end
  49. pkunzip -o %2 sdn.id
  50. if exist %1\sdn.id ren %1\sdn.id descfile.txt
  51. goto end
  52.  
  53. :LHA
  54. lha e /m+c+ %2 file_id.diz
  55. if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
  56. if exist %1\descfile.txt goto end
  57. lha e /m+c+ %2 sdn.id
  58. if exist %1\sdn.id ren %1\sdn.id descfile.txt
  59. goto end
  60.  
  61. :UNRAR
  62. unrar e -o+ %2 file_id.diz
  63. if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
  64. if exist %1\descfile.txt goto end
  65. unrar e -o+ %2 sdn.id
  66. if exist %1\sdn.id ren %1\sdn.id descfile.txt
  67. goto end
  68.  
  69. :PKUNPAK
  70. pkunpak -r %2 file_id.diz
  71. if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
  72. if exist %1\descfile.txt goto end
  73. pkunpak -r %2 sdn.id
  74. if exist %1\sdn.id ren %1\sdn.id descfile.txt
  75. goto end
  76.  
  77. :ZOO
  78. zoo e %2 file_id.diz
  79. if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
  80. if exist %1\descfile.txt goto end
  81. zoo e %2 sdn.id
  82. if exist %1\sdn.id ren %1\sdn.id descfile.txt
  83. goto end
  84.  
  85. :PAK
  86. pak e/WA %2 file_id.diz
  87. if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
  88. if exist %1\descfile.txt goto end
  89. pak e/WA %2 sdn.id
  90. if exist %1\sdn.id ren %1\sdn.id descfile.txt
  91. goto end
  92.  
  93. :end
  94. rem =--=If no descriptor is found, StarBar will expand the full original=--=
  95. rem =--=FILES.BBS description and display that...=--=
  96.